home *** CD-ROM | disk | FTP | other *** search
/ Best of www.BestZips.com (Collector's Edition) / Best of WWW.BESTZIPS.COM Collector's Edition (JCSM Shareware) (JCS Marketing).ISO / grapprog / splt300w.zip / TDXY.ZIP / T2-28.BAS < prev    next >
BASIC Source File  |  1990-03-13  |  187b  |  9 lines
  1. 10 OPEN "t2-28.plt" FOR OUTPUT AS #1
  2. 20 FOR N=0 TO 1
  3. 30  FOR I=-50 TO 50 STEP 100
  4. 40   PRINT #1,"m1500,1500"
  5. 50   PRINT #1,"x";N;",";I;",20"
  6. 60  NEXT I
  7. 70 NEXT N
  8. 80 PRINT #1,"h"
  9.